home *** CD-ROM | disk | FTP | other *** search
/ ETO Development Tools 1 / ETO Development Tools 1.iso / Essentials / MacApp Documentation / MacApp AppleLink Messages / MacApp.Tech$ 5⁄25⁄90 / 1328-MacApp 2.0ß9 Dialog -May90 < prev    next >
Encoding:
Text File  |  1990-05-25  |  1.4 KB  |  41 lines  |  [TEXT/GEOL]

  1. Item    1185657                         22-May-90        13:32DST
  2.  
  3. From:   UK0016                          Icon Technology UK,IDV
  4.  
  5. To:     MACAPP.TECH$                    MacApp Technical
  6.  
  7. cc:     MACDTS                          Macintosh Developer Tech Supt
  8.  
  9. Sub:    MacApp 2.0ß9 Dialog Bug
  10.  
  11. I have found a bug in MacApp 2.0ß9.
  12.  
  13. I have a dialog with 2 edit text fields with the fMaxChars value for one of the
  14. fields smaller than than that of the other. If I try and tab from the shorter
  15. field to the longer field and length of the text in the longer field exceeds
  16. the fMaxChars value of the shorter field, then MacApp forces a failure in
  17. TTEView.StuffText.
  18.  
  19. The problem seems to be in TDialogTEView.InstallEditText which doesn't update
  20. the fMaxChars field until after the call of SetText. I have moved the
  21. assignment to fMaxChars and it now works OK.
  22.  
  23. ===============================================================================
  24.                  ...
  25.     theEditText.GetText(theText);
  26.     fMaxChars := theEditText.fMaxChars; {moved from below}
  27.     SetText(theText); {this calls StuffText}
  28.     RecalcText;
  29.     IF selectChars THEN
  30.      SetSelect(0, MAXINT, fHTE)
  31.     ELSE
  32.      SetSelect(0, 0, fHTE);{ Caller will set the selection. }
  33.     {fMaxChars := theEditText.fMaxChars; old position}
  34.                  ...
  35. ===============================================================================
  36.  
  37. Apologies if this has been reported 100 times already.
  38.  
  39. Regards, Keith Lander
  40.  
  41.